home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 July / 07_02.iso / software / xq-xsetup / files / setup.exe / {app} / plugins / XQ WinNT File System 1.xpl < prev    next >
Text File  |  2001-10-27  |  3KB  |  95 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="4"
  4. "UIPATH"="System\File System\Windows NT/2K/XP Options"
  5. "NAME"="Windows File System Options"
  6. "VERSION"="1.36"
  7. "OSVERSION"="010101"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Enable update of "Last Access" attribute"
  10. "TEXT 2"="Clear pagefile (swapfile) on shutdown"
  11. "TEXT 3"="Create 8+3 filenames (NTFS partitions only)"
  12. "TEXT 4"="Allow extended characters in 8+3 filenames (NTFS partitions only)"
  13. "DESCRIPTION 1"="By default, Windows updates the attribute "Last Access at" each time you access a file. If you don't need this feature, you can disable it here to save time. Disabling this feature is useful if this machine is used as a fileserver and should be as fast as possible."
  14. "DESCRIPTION 2"="By default, the Windows pagefile (for temp. memory) is left intact on shutdown, and could be scanned for useful information. By enabling this option, the pagefile is cleared on shutdown by Windows so it can't be scanned."
  15. "DESCRIPTION 3"="If "Create 8+3 filenames" is activated (default), Windows also creates a 8+3 filename for each file. Only 16-bit apps will need those 8+3 names, so if you don't have any legacy programs you can properly deactivate this option."
  16. "DESCRIPTION 4"="If "Allow extended characters in 8+3 filenames" is activated (this setting is DEACTIVATED by default), Windows can use extended characters (=outside the basic 64-character set) for the automatic filename creation. Activating this option might lead to problems with legacy application if they use a different code page than Windows itself."
  17. "AUTHOR"="Xteq Systems"
  18. "CONTACTURL"="http://www.xteq.com"
  19. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  20. "COMMENT 1"=" "
  21. "COMMENT 2"="Thanks to John Hansen [sasjwh@wnt.sas.com] for his help and the Win2K feature!"
  22. "COMMENT 2"="Thanks to Pierre Szwarc [mailto:szwarc@usa.net] for setting 3+4!"
  23.  
  24.  
  25.  
  26. sP="HKLM\System\CurrentControlSet\Control\FileSystem\NtfsDisableLastAccessUpdate"
  27. sP2="HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management\ClearPageFileAtShutdown"
  28. sP3="HKLM\System\CurrentControlSet\Control\FileSystem\NtfsDisable8dot3NameCreation"
  29. sP4="HKLM\System\CurrentControlSet\Control\FileSystem\NtfsAllowExtendedCharacterIn8dot3Name"
  30.  
  31. Sub Plugin_Initialize 
  32.     i=RegReadValue(sP)
  33.     if IsEmpty(i) or i=0 then
  34.        SetUIElement 1,true
  35.     end if
  36.  
  37.     i=RegReadValue(sP2)
  38.     if i=1 then
  39.        Call SetUIElement(2,true) 
  40.     end if  
  41.  
  42.     i=RegReadValue(sP3)
  43.     if IsEmpty(i) or i=0 then
  44.        SetUIElement 3,true
  45.     end if
  46.  
  47.     i=RegReadValue(sP4)
  48.     if i=1 then
  49.        SetUIElement 4,true
  50.     end if
  51.  
  52. End Sub
  53.  
  54. Sub Plugin_CheckData(ElementIndex)
  55. End Sub
  56.  
  57. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  58.  b=GetUIElement(1)
  59.  if b=true then
  60.     Call RegWriteValue(sp,0,2)
  61.  else 
  62.     Call RegWriteValue(sp,1,2)
  63.  end if
  64.  
  65.  
  66.  b=GetUIElement(2)
  67.  if b=true then
  68.     Call RegWriteValue(sP2,1,2) 
  69.  else
  70.     Call RegWriteValue(sP2,0,2) 
  71.  end if
  72.  
  73.  b=GetUIElement(3)
  74.  if b=true then
  75.     Call RegWriteValue(sP3,0,2) 
  76.  else
  77.     Call RegWriteValue(sP3,1,2) 
  78.  end if
  79.  
  80.  b=GetUIElement(4)
  81.  if b=true then
  82.     Call RegWriteValue(sP4,1,2) 
  83.  else
  84.     Call RegWriteValue(sP4,0,2) 
  85.  end if
  86.  
  87.  
  88.  
  89.  Restart
  90. End Sub
  91.  
  92. Sub Plugin_Terminate 
  93. End Sub
  94.  
  95.